(wordstar-mode): Run wordstar-mode-hook.

diff --git a/lisp/emulation/ws-mode.el b/lisp/emulation/ws-mode.el
index 29158dbf174427d0d62a35abdc82cac45e94f98a..50340e90785e56ab67c0625bb764f49198b0cb03 100644 (file)
--- a/lisp/emulation/ws-mode.el
+++ b/lisp/emulation/ws-mode.el
@@ -293,7 +293,8 @@ The key bindings are:
   (kill-all-local-variables)
   (use-local-map wordstar-mode-map)
   (setq mode-name "WordStar")
-  (setq major-mode 'wordstar-mode))
+  (setq major-mode 'wordstar-mode)
+  (run-hooks 'wordstar-mode-hook))
 
 
 (defun wordstar-center-paragraph ()